home *** CD-ROM | disk | FTP | other *** search
/ Aminet 40 / Aminet 40 (2000)(Schatztruhe)[!][Dec 2000].iso / Aminet / util / time / CyberClock_mag.lha / CyberClock / Install CyberClock next >
Text File  |  2000-10-07  |  2KB  |  48 lines
  1. ;$VER: CyberClock installer script 2.00
  2. ;Copyright © 2000 by Nikola Smolenski
  3.  
  4. (set @default-dest "")
  5.  
  6. (set d0 "CyberClock_Amelia.bsh"
  7.      d1 "CyberClock_digital_small.bsh"
  8.      d2 "CyberClock_digital.bsh"
  9.      d3 "CyberClock_digital_large.bsh"
  10.      d4 "CyberClock_Frontier.bsh"
  11.      d5 "CyberClock_Frontier_large.bsh"
  12.      d6 "CyberClock_Pinball.bsh"
  13.      d7 "CyberClock_mFast.bsh"
  14.      d8 "CyberClock_topaz.bsh"
  15.      d9 "CyberClock_topaz_white.bsh")
  16.  
  17. (set exedest (askdir (prompt
  18.              "Where do you want to have CyberClock executable?")
  19.              (help @askdir-help) (disk) (default "SYS:WBStartup")))
  20.  
  21. (copyfiles (source "CyberClock") (dest exedest) (infos))
  22.  
  23. (set docdest (askdir (prompt
  24.              "Where do you want to have CyberClock documentation?")
  25.              (help @askdir-help) (disk) (default "HELP:English/")))
  26.  
  27. (copyfiles (source "CyberClock.guide") (dest docdest) (infos))
  28.  
  29. (textfile (dest "S:CyberClock.reinstall") (append (cat exedest "\n" docdest "\n")))
  30.  
  31. (copyfiles (source (cat "Digits/" (select (askchoice
  32.                                           (prompt
  33.                                           "Which set of digits you want to use?")
  34.                                           (help @askchoice-help)
  35.                                           (choices d0 d1 d2 d3 d4 d5 d6 d7 d8 d9)
  36.                                           (default 1))
  37.                                   d0 d1 d2 d3 d4 d5 d6 d7 d8 d9)))
  38.            (dest "S:") (newname "CyberClock.bsh"))
  39.  
  40. (copyfiles (source "Catalogs/magyar/CyberClock.catalog")
  41.            (dest "LOCALE:Catalogs/magyar/"))
  42. (copylib (source "libs/iff.library") (dest "LIBS:"))
  43. (copylib (source "libs/screennotify.library") (dest "LIBS:"))
  44.  
  45. (exit "\nCyberClock installation complete.\n\n"
  46.       "Next time you want to update CyberClock, use the "
  47.       "\"ReInstall CyberClock\" script.\n" (quiet))
  48.